MDIľ岽裺
1WindowsӦó 
2ڡԡУForm1IsMDIContainerΪTrue⽫ôָΪMDI塣 
3MenuStripӡ䡿ϵForm1ϡһTextΪļĶ˵ҴΪ½͡رաӲ˵ٴһΪڡĶ˵ͼ1-19ʾ
 
ͼ1-19 һ򵥵MDI
4ڡĿ˵УWindows 塱ɴForm2塣Windows򿪣ʾForm2塣 
5ӡ䡿϶һLabelؼForm2ϡ
6MDIġ½رա򣨡ڡ˵Ĵδǣ 
Private Sub ½ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ½ToolStripMenuItem.Click
        Dim child As New Form2
        Static childCount As Int16
        childCount += 1
        child.Text = "Child " + childCount.ToString()
        child.MdiParent = Me
        child.Show()
    End Sub
Private Sub رToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles رToolStripMenuItem.Click
        End
End Sub
7MDIӴм´룺
Private Sub Form2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Click
        Me.Label1.Text = "MDIӴ"
End Sub
ݼF5иӦóִС½˵굥Form22Σͼ1-19ʾ
